home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
icon
/
packages.lha
/
packages
/
atari
/
ats.arc
/
STAND.ARC
/
VERSION7.OUT
< prev
next >
Wrap
Text File
|
1990-03-28
|
4KB
|
172 lines
megaron.cs.arizona.edu
Icon Version 8.0. March 25, 1990
&line=7
&file=version7.icn
&error=0
UNIX
ASCII
co-expressions
direct execution
environment variables
error trace back
executable images
expandable regions
external functions
large integers
math functions
memory monitoring
pipes
string invocation
system function
i j ~j i & j i | j i ^ j i << j i >> j
1 0
00000001 00000000 FFFFFFFF 00000000 00000001 00000001 00000001 00000001
1 1
00000001 00000001 FFFFFFFE 00000001 00000001 00000000 00000002 00000000
1 2
00000001 00000002 FFFFFFFD 00000000 00000003 00000003 00000004 00000000
1 3
00000001 00000003 FFFFFFFC 00000001 00000003 00000002 00000008 00000000
1 4
00000001 00000004 FFFFFFFB 00000000 00000005 00000005 00000010 00000000
1 100
00000001 00000064 FFFFFF9B 00000000 00000065 00000065 00000000 00000000
i j ~j i & j i | j i ^ j i << j i >> j
2 0
00000002 00000000 FFFFFFFF 00000000 00000002 00000002 00000002 00000002
2 1
00000002 00000001 FFFFFFFE 00000000 00000003 00000003 00000004 00000001
2 2
00000002 00000002 FFFFFFFD 00000002 00000002 00000000 00000008 00000000
2 3
00000002 00000003 FFFFFFFC 00000002 00000003 00000001 00000010 00000000
2 4
00000002 00000004 FFFFFFFB 00000000 00000006 00000006 00000020 00000000
2 100
00000002 00000064 FFFFFF9B 00000000 00000066 00000066 00000000 00000000
i j ~j i & j i | j i ^ j i << j i >> j
3 0
00000003 00000000 FFFFFFFF 00000000 00000003 00000003 00000003 00000003
3 1
00000003 00000001 FFFFFFFE 00000001 00000003 00000002 00000006 00000001
3 2
00000003 00000002 FFFFFFFD 00000002 00000003 00000001 0000000C 00000000
3 3
00000003 00000003 FFFFFFFC 00000003 00000003 00000000 00000018 00000000
3 4
00000003 00000004 FFFFFFFB 00000000 00000007 00000007 00000030 00000000
3 100
00000003 00000064 FFFFFF9B 00000000 00000067 00000067 00000000 00000000
file(concord.dat)
11
"eoptera, ("
21
21
1212
"."
1213
/usr/ralph
getenv failed
getenv failed
&ascii
&cset
&digits
'123456789'
'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz'
'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz'
&lcase
list_3(1)
list_4(2)
list_5(3)
list_6(4)
list_7(0)
p(1):
image(a):1
image(b):&null
image(c):list_10(0)
every write("\t", !c):
p(1, 2):
image(a):1
image(b):2
image(c):list_11(0)
every write("\t", !c):
p(1, 2, 3):
image(a):1
image(b):2
image(c):list_12(1)
every write("\t", !c):
3
p(1, 2, 3, 4, 5):
image(a):1
image(b):2
image(c):list_13(3)
every write("\t", !c):
3
4
5
q(1, 2):
every write("\t", !a):
1
2
t := table("default") --> table_2(0)
*t --> 0
t["xyz"] --> "default"
member(t, "xyz") --> failure
contents of t:
insert(t, 3, 4) --> table_2(1)
insert(t, "xyz", "abc") --> table_2(2)
insert(t, &digits) --> table_2(3)
*t --> 3
t["xyz"] --> "abc"
member(t, "xyz") --> "xyz"
contents of t:
3 : 4
"xyz" : "abc"
&digits : &null
t["xyz"] := "new value" --> "new value"
*t --> 3
t["xyz"] --> "new value"
member(t, "xyz") --> "xyz"
contents of t:
3 : 4
"xyz" : "new value"
&digits : &null
insert(t, "xyz", "def") --> table_2(3)
*t --> 3
t["xyz"] --> "def"
member(t, "xyz") --> "xyz"
contents of t:
3 : 4
"xyz" : "def"
&digits : &null
delete(t, "xyz") -- > table_2(2)
*t --> 2
t["xyz"] --> "default"
member(t, "xyz") --> failure
contents of t:
3 : 4
&digits : &null
delete(t, "xyz") -- > table_2(2)
*t --> 2
t["xyz"] --> "default"
member(t, "xyz") --> failure
contents of t:
3 : 4
&digits : &null
&errornumber=101
&errortext=integer expected
&errorvalue=no value
Run-time error 701
File version7.icn; Line 154
offending value: "abc"
Trace back:
main()
runerr(701,"abc") from line 154 in version7.icn